(rmail-make-basic-summary-line):

If user-mail-address is nil, use alternative.

diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el
index f2134f99934eb8225d56d41e213fa9ea4123363e..f9152447733cba143f7c486a325122906a287bdf 100644 (file)
--- a/lisp/mail/rmailsum.el
+++ b/lisp/mail/rmailsum.el
@@ -365,7 +365,14 @@ nil for FUNCTION means all messages."
                (if (string-match (concat "^\\("
                                          (regexp-quote (user-login-name))
                                          "\\($\\|@\\)\\|"
-                                         (regexp-quote user-mail-address)
+                                         (regexp-quote
+                                          ;; Don't lose if run from init file
+                                          ;; where user-mail-address is not
+                                          ;; set yet.
+                                          (or user-mail-address
+                                              (concat (user-login-name) "@"
+                                                      (or mail-host-address
+                                                          (system-name)))))
                                          "\\>\\)")
                                  from)
                    (save-excursion